sub waitvbl():
  asm
    halt
    end asm

'-  look for WaitForVBlankNoInt
